<init>
subevent(mapinit,);

item(check:eq,aT,1); if(nowres);
#mc(54,enegr,+=,(TSOy(2),TS}(2),TSZ藜(2)));
#mc(54,enegr,+=,(TS~Q(4),TSOy(2),TS}(2),TSZ藜(2)));
#,ȂTS(4),TLTS(4)

mc(78,enegr,+=,(TS(9)));
#mc(78,enegr,+=,(TS~Q(4),ȂTS(4),TLTS(4),cglTS(4)));
#mc(78,enegr,+=,(TS~R(3),TSOyQ,TS}Q,TSZ藜Q));
#,ȂTLTS(3)

#mc(42,enegr,+=,(TS~U,TS));
#item(check:eq,aT,1); if(nowres); mc(42,enegr,+=,(TSQ)); endif;
endif;

subevent(yj4adbl,); if(nowres);
mc(54,enegr,+=,(`S~Q(2),`SOy(2),`SfrO(2),`S}(2),`SZ藜(2),Ȃ`S(4),TL`S(4),cgl`S(4)));
mc(95,enegr,+=,(Ȃ`cgl`S));
#mc(54,enegr,+=,(`S~Q(4),`SOy(2),`S}(2),`SZ藜(2),Ȃ`S(4),TL`S(4)));

mc(78,enegr,+=,(`S~R(3),`SOyQ,`SfrOQ,`S}Q,`SZ藜Q,`SOyfrO,`S}Z藜,Ȃ`SOy,Ȃ`S},Ȃ`SZ藜,TL`SOy,TL`S},TL`SZ藜,cgl`SOy,cgl`S},cgl`SZ藜,ȂTL`S(3),Ȃcgl`S(3),TLcgl`S(3)));
#`SOy},`SOyZ藜,`S}Z藜,`SOy},`SOyZ藜,
#Ȃ`SOy(2),Ȃ`S}(2),Ȃ`SZ藜(2),TL`SOy(2),TL`S}(2),TL`SZ藜(2),ȂTL`S(3)
#item(check:eq,aT,1); if(nowres);
#mc(54,enegr,+=,(TS`S(4)));
#mc(78,enegr,+=,TS`S(4));
#mc(78,enegr,+=,Ȃ``S(6));
#endif;

endif;

subevent(yj5adbl,); if(nowres);
mc(42,enegr,+=,(xi|`T));
endif;

# and; item(check:eq,,1);
#mc(54,enegr,+=,(`S~Q,`SOy,`S},`SZ藜,Ȃ`S(4),TL`S(4),`P``S(4),xiS(4)));
#enedf(coral,!=,0); if(nowres); mc(54,enegr,+=,(TS,TS~Q,TSOy,TS},TSZ藜,ȂTS,TLTS)); endif;
#enedf(yj-a4,!=,0); and; enedf(coral,!=,0); if(nowres); mc(54,enegr,+=,(TS`S,xiS)); endif;
#nCp[v[AtB[hALmRʘHAnAV

zukan(warppos:*all,!&,kofun); if(nowres); fc(c2,apr,=,1); endif;


#Ƃɓ
<hokora_in>
#evflagsw(fastrecv,==,1); if(nowres); subevent(recover,); end; endif;
#fc(*actor,ride,check,car_mv); if(nowres); subevent(recover,); end; endif;
#fc(*actor,ride,check,*null); unif(nowres); end; endif;
#fc(dir,*actor,==,0,6);
fade(out,(type=fade,color=000000,wait=16));
evflagsw(ex_hokora,==,0); if(nowres); evflagsw(ex_hokora,=,1); image(0,set, picture:K,0,0,0,0,,,,,); fade(in,(type=fade,color=000000,wait=16)); wait(-1); fade(out,(type=fade,color=000000,wait=16)); image(0,set,); endif;
#image(0,set, house.bmp,0,0,,,,0,0,,,); fade(in,(type=fade,color=000000,wait=16)); fade(out,(type=fade,color=000000,wait=16)); image(0,set,);

#text(1,face=uam,K);
#fc(*actor,dir,>,l); if(nowres); fc(*actor,move,-6,14,center); fc(*actor,dir,=,u); goto(5); endif;
fc(*actor,dir,>=,lu); and; fc(*actor,dir,<=,ru); if(nowres); fc(*actor,move,-6,14,center); fc(*actor,dir,=,u); goto(5); endif;
fc(*actor,move,0,0,center);
#fc(*actor,dir,==,d); if(nowres); goto(5); endif;
fc(*actor,dir,=,d);
#image(0,set, house.bmp,0,0,,,,0,0,,,); fade(in,(type=fade,color=000000,wait=16)); wait(-1); fade(out,(type=fade,color=000000,wait=16)); image(0,set,);
#image(0,set, house.bmp,0,0,,,,0,0,0,,); image(0,scl,0,0,8,0,0); wait(32); wait(-1); image(0,scl,0,0,-8,0,0); wait(32); image(0,set,);
label(5); changemap(K); fade(in,(type=fade,color=000000,wait=16));
end;
label(6); subevent(recover,);


#xɓ
<hokora2_in>
#evflagsw(fastrecv,==,1); if(nowres); subevent(recover,); end; endif;
#fc(*actor,dir,==,r); or; fc(*actor,dir,==,d); if(nowres);
#else;
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,dir,>=,lu); or; fc(*actor,dir,<,rd); if(nowres); fc(*actor,move,-18,13,center); fc(*actor,dir,=,r); else; fc(*actor,move,-6,0,center); fc(*actor,dir,=,d); endif; changemap(K); fade(in,(type=fade,color=000000,wait=16));
#endif;
#fade(out,(type=fade,color=000000,wait=16));
#fc(dir,*actor,==,3); if(nowres); fc(move,*actor,2,-6,14,3);
#else; fc(move,*actor,2,0,0,2);
#endif; changemap(K); fade(in,(type=fade,color=000000,wait=16));


#xɓ
<hokora3_in>
#evflagsw(fastrecv,==,1); if(nowres); subevent(recover,); end; endif;
#fc(*actor,dir,==,d); or; fc(*actor,dir,==,u); if(nowres);
#else;
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,dir,>,lu); if(nowres); fc(*actor,move,-11,14,center); fc(*actor,dir,=,u); else; fc(*actor,dir,>=,ld); and; fc(*actor,dir,<=,lu); if(nowres); evflagsw(pr_hkr3dr,=,1); fc(*actor,move,1,1,center); fc(*actor,dir,=,l); else; fc(*actor,move,-6,0,center); fc(*actor,dir,=,d); endif; endif; changemap(K); fade(in,(type=fade,color=000000,wait=16));
#fc(*actor,dir,==,r); if(nowres); fc(*actor,move,-18,6,center); else; 
#endif;
#fade(out,(type=fade,color=000000,wait=16));
#fc(dir,*actor,==,3); if(nowres); fc(move,*actor,2,-5,14,3);
#else; fc(move,*actor,2,-5,0,2);
#endif;
#changemap(K); fade(in,(type=fade,color=000000,wait=16));


#Aɓij
<cave_in_w>
evflagsw(ex_cave,==,0); if(nowres);
text(1,(face=uam,swait=-1),̐AG͂ǂǂ񋭂Ȃ邾낤I\nSłĂQ[I[o[ɂ͂ȂȂiݒςĂȂ΁jA𔼕ɉƂɋA҂Ă܂̂Œӂ悤I);
#\nQ[I[o[ɂȂȂƃXĕȂꍇ́AƂ̃p\RŐݒςė悤IiTȂǂ͂܂j
#text(1,face=uam,̐AG͂ǂǂ񋭂Ȃ邾낤I\nSłQ[I[o[ɂȂĂ܂ݒ̏ꍇ͂܂߂ɃZ[u悤I\nȂ݂ɁAZ[uf[^100܂ō邼I@Z[uʂōEL[Ă݂悤I);
#text(1,face=uam,̐AG͂ǂǂ񋭂Ȃ邾낤I\nSłKɋA҂Ă܂̂ł܂߂ɃZ[u悤I\nȂ݂ɁAZ[uf[^100܂ō邼I@Z[uʂōEL[Ă݂悤I);
#text(1,face=uam,̐AG͂ǂǂ񋭂Ȃ邾낤I\nSłQ[I[o[ɂȂĂ܂̂ŁA܂߂ɃZ[u悤Ii݂͕Wł̓Q[I[o[ɂ͂Ȃ܂B̐ݒK̒nŕύXł܂j\nȂ݂ɁAZ[uf[^100܂ō邼I@Z[uʂōEL[Ă݂悤I);
#text(1,face=uam,̐AG͂ǂǂ񋭂Ȃ邾낤I\nSłQ[I[o[ɂȂĂ܂̂ŁA܂߂ɃZ[u悤I\nZ[uEChÉA[wŃj[JAuɋLvIΏoė邼I);
#text(1,face=uam,Ȃ݂ɁAZ[uf[^͖ʂ100܂ō邼I@Z[uʂōEL[Ă݂悤I);
endif;
#evflag(cave,=,1);
zukan(warppos:*all,|=,cv1_w);
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,0,0,center); fc(*actor,dir,=,r); changemap(Agl); fade(in,(type=holcircle,color=000000,wait=16));
#fade(out,fade,def,255,def); fc(move,0,2,0,0,0); changemap(Agl); fade(in,fade,def,255,def);
evflagsw(ex_cave,==,0); if(nowres);
#fc(apr,10,=,1); scrollfc(10,0,0); fc(walk,10,0,4,20,0,0); return; wait(32); fc(walk,10,0,4,-20,0,0); return; fc(apr,10,=,0);
#scroll(40,0,160); return; scroll(-40,0,160); return;
#scroll(30,-10,128); return; scroll(35,1,128); return; scroll(-35,-1,128); return; scroll(-30,10,128); return;
scroll(48,0,128); return; scroll(56,-32,128); return; scroll(-56,0,128); return; scroll(-48,32,128); return;
evflagsw(ex_cave,=,1);
fcscroll(*actor);
endif;


#Aɓij
<cave_in_e>
zukan(warppos:*all,|=,cv1_e);
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,26,-8,center); fc(*actor,dir,=,l); changemap(Agl); fade(in,(type=holcircle,color=000000,wait=16));


#Aɓikj
<cave_in_n>
zukan(warppos:*all,|=,cv1_n);
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,26,-17,center); fc(*actor,dir,=,l); changemap(Agl); fade(in,(type=holcircle,color=000000,wait=16));


#{aɓ
#SŋAҎ̉}uL
<casl_in>
#fc(*actor,dir,==,2); if(nowres);
fc(*actor,moved,y+); if(nowres);
zukan(warppos:*all,|=,cassle); evflagsw(ct_valaback,=,0); fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,17,-6,center); fc(*actor,dir,=,d); fc(*actor,float,=,128); changemap(ip[{aSe); fade(in,(type=fade,color=000000,wait=16)); end;
endif;

#fc(*actor,dir,==,3); if(nowres);
fc(*actor,moved,y-); if(nowres);

evflagsw(ex_caslin,==,0); if(nowres);
#label(11);
evflagsw(ex_caslin,=,1);
text(1,(face=uam,swait=-1),ip[̖{n̂悤B̖JccI);
fade(out,(type=fade,color=000000,wait=16)); fcscroll(*null); image(0,set, picture:w,0,0,0,0,,,,,); image(1,set, picture:,0,0,0,-160,,1500,1500,,); image(2,set, picture:O,0,0,0,0,,2000,2000,,); fade(in,(type=fade,color=000000,wait=16)); image(1,scl, 0,16,,-10,-10,); image(2,scl, 0,48,,-20,-20,); wait(50); image(1,scl, 0,16,,0,0,); image(2,scl, 0,48,,0,0,); wait(110); image(1,scl, 0,0,,,,); image(2,scl, 0,0,,,,);
#image(0,set, cassle.bmp,,0,-160,0); image(0,scl, 0,0,8); wait(32); image(0,scl, 0,4,0); wait(160); image(0,scl, 0,0,0);
#image(0,fade, 128); return;
#music(silent); loopsnd,alert);
#sound(alert); wait(96); sound(alert); wait(96); sound(alert);
endif;

subevent(passbattle,); if(nowres); image(0,set,); image(1,set,); image(2,set,); fcscroll(*actor);
else;
music(main,=,snd_alert:0); zukan(sound:*all,|=,alert);
fc(*actor,pic,==,valanorpa); or; fc(*actor,pic,==,mutou); if(nowres); text(1,face=pigmarg,sO}[OuXK^JGee_Iv); else; text(1,face=pigmarg,sO}[OuVjEVnbPIv); endif;
#loopsnd,);
fade(out,(type=btdefo,color=btdefo,dep=btdefo,rot=btdefo,wait=btdefo)); battle((enegr=sO}~R,back=rock,bgm=battle2:def,stm=0));
image(0,set,); image(1,set,); image(2,set,); fcscroll(*actor);
evflag(*selected,==,3); if(nowres); music(main,=,*def:def); fade(in,); fc(*actor,walk,0,8,0,1,d); return; text(1,face=uam,oI); end; endif;
evflag(*selected,==,2); if(nowres); end; endif;
endif;

else;
fade(out,(type=fade,color=000000,wait=16));
endif;

zukan(warppos:*all,|=,cassle); evflagsw(ct_valaback,=,0); fc(*actor,move,8,7,center); fc(*actor,dir,=,u); changemap(ip[{a); fade(in,(type=fade,color=000000,wait=16)); end;
#label(4); image(0,set,); image(1,set,); image(2,set,); music(def,def); fade(in,(type=fade,color=000000,wait=16)); fc(*actor,walk,*actor,0,8,0,1,2); return; text(1,face=uam,oI);
#btres(escaped);
#label(4); image(0,set,); music(def,def); fc(walk,*actor,0,8,0,1,2); fade(in,fade,def,255,def); text(1,face=uam,oI); btres(escaped);
#label(5);


#Xɓ
<forest_in>
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,0,0,center); fc(*actor,dir,=,u); changemap(X̃_W); fade(in,(type=fade,color=000000,wait=16));


#XQɓ
<forest2_in>
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,0,11,center); fc(*actor,dir,=,r); changemap(X̃_WQ); fade(in,(type=fade,color=000000,wait=16));


#Rɓ
<mount_in>
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,-10,-5,center); fc(*actor,dir,=,r); changemap(^̎R); fade(in,(type=fade,color=000000,wait=16));


#C̓Aɓikj
<scave_ne>
#fc(*actor,ride,offable,*actor:ride:-1); if(nowres);
zukan(warppos:*all,|=,scv_ne);
fc(*actor,dir,==,l); if(nowres);
#subevent(forced_rideoff,*actor);
evflagsw(pr_seacave,=,1);
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,0,0,center); changemap(Ĉق猊); fade(in,(type=holcircle,color=000000,wait=16));
else;
fade(out,(type=fade,color=000000,wait=16)); zukan(warppos:*all,|=,scv_sw); fc(*actor,move,-1,11,center); fade(in,(type=fade,color=000000,wait=16));
endif;
#endif;


#C̓Aɓi쐼j
<scave_sw>
#fc(*actor,ride,check,*null); unif(nowres); end; endif;
#fcride(check,,1,); fcride(offable,,2); item(check:eq,{ǎ,1,,3); label(1);
#fc(*actor,ride,offable,*actor:ride:-1); if(nowres);
zukan(warppos:*all,|=,scv_sw);
fc(*actor,dir,==,r); if(nowres);
evflagsw(pr_seacave2,=,1);
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,-91,0,center); changemap(Ĉق猊); fade(in,(type=holcircle,color=000000,wait=16));
else;
#evflag(main,>=,1); if(nowres);
fade(out,(type=fade,color=000000,wait=16)); zukan(warppos:*all,|=,scv_ne); fc(*actor,move,38,-17,center); fade(in,(type=fade,color=000000,wait=16));
#else; text(0,̏蕨ł͒ʍsłȂ);
#else;
#end; label(3); text(1,face=uam,Dłʂɂ͉̌Kv̂悤B);
#label(3); text(1,face=uam,ʍsłȂ悤B);
#endif;
#endif;
#end; label(2); text(0,̏蕨ł͒ʍsłȂ);
endif;

#fcride(check,,1,2); end;
#label(1); text(0,蕨ɏĂȂ); goto(5);
#label(2); fcride(check,ship,3,4); end;
#label(3); text(0,DɏĂ); goto(5);
#label(4); text(0,DȊOɏĂ);
#label(5);


#ɓ
<tower_in>
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,0,0,center); fc(*actor,dir,=,u); changemap(); fade(in,(type=fade,color=000000,wait=16));


#pЂɓ
<haikyo_in>
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,dir,>=,rd); and; fc(*actor,dir,<=,ld); if(nowres); fc(*actor,move,9,-14,center); fc(*actor,dir,=,d); else; fc(*actor,move,0,0,center); fc(*actor,dir,=,u); endif; changemap(p); fade(in,(type=fade,color=000000,wait=16));


#R̎Ђɓ
<yashiro_in>
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,0,0,center); fc(*actor,dir,=,u); changemap(R̎); fade(in,(type=fade,color=000000,wait=16));


#
<chyaku>
zukan(warppos:*all,|=,chyaku);
item(check,chyaku,5); if(nowres); text(1,face=uam,ŕ[łw%it[*chyaku].nmicx͂T܂łB); else; subevent(box_item(id(item:chyaku)),); endif;


#O~
<kofun>
evcombi(warppos,|=,warppos,kofun);
zukan(warppos:*all,|=,kofun); fc(c2,apr,=,0);
text(1,face=uam,ÕۂB);

party(,check,l); if(nowres);
memslc(*l);
member(select,job,E,==,ilr); or; member(select,job,E,==,ilg); if(nowres);
text(1,(face=uam,lwait=0,select=߂\n߂Ȃ,islc=1),%mem[s]%job[*ilm]ɖ߂܂H\n%ct3Ė߂ĂTȂǂ͗L܂B%cd);
#select2(reset,all); select2(+͂(id=0)); select2(+); select2(/); select2(*(cid=));
evflag(*selected,==,0); if(nowres); member(select,job,E,=,ilm); subevent(kigae_sub,); text(1,face=uam,%mem[s]%job[*ilm]ɖ߂B); endif;
else;
member(select,job,E,=,ilr);
sound(warp);
#feffect(up2,,1,*slcmem,*slcmem);
subevent(kigae_sub,);
text(1,(face=uam,swait=-1),%ct2%mem[s]%cd%ct2%job[*ilr]%cdɐiI\ni퓬̉摜ωj);
endif;
endif;


#s~bh
<pyramid>
zukan(warppos:*all,|=,pyramid);
text(1,face=uam,s~bhۂB);

item(check:aleq|alpt|bank,̌,1); or; item(check:aleq|alpt|bank,̏,1); or; item(check:aleq|alpt|bank,,1); or; item(check:aleq|alpt|bank,,1); unif(nowres);
sound(warp); item(get,̌,1); item(get,̏,1); text(1,(face=uam,swait=-1),w%ct2%it[*̌].nmri%cdxƁw%ct2%it[*̏].nmri%cdxɓꂽI);
text(1,(face=uam,swait=-1),⏂Ȃǂ̑i͒ʏAĂ邾ł͖ɗȂBj[w%ct2%sysm[*cngeq].nmic%cdxIőĂ݂悤I);

party(,check,l); if(nowres);
text(1,(face=uam,lwait=0,select=͂\n,islc=1),ő܂H);
evflag(*selected,==,0); if(nowres); 
member(*l,equip,eq1,release,*some); member(*l,equip,eq1,change,̌);
member(*l,equip,eq2,release,*some); member(*l,equip,eq2,change,̏);
sound(warp); text(1,(face=uam,swait=-1),w%ct2%it[*̌].nmri%cdxƁw%ct2%it[*̏].nmri%cdx𑕔I);
endif;
endif;

else;
#item(check:eq,̌,1); or; item(check:eq,,1); if(nowres); item(check:eq,̏,1); or; item(check:eq,,1); if(nowres);
text(1,(face=uam,lwait=0,select=҂\n҂Ȃ,islc=1),w%it[*̌].nmicxƁw%it[*̏].nmicx҂܂H\n%ct3Ċ҂ĂTȂǂ͗L܂B%cd);
#select2(reset,all); select2(+͂(id=0)); select2(+); select2(/); select2(*(cid=));
#evflag(*selected,==,0); if(nowres); item(lost:2,̌,1); item(lost:2,̏,1); item(lost:2,,1); item(lost:2,,1); text(1,(face=uam,swait=-1),w%it[*̌].nmicxƁw%it[*̏].nmicx҂B); endif;
evflag(*selected,==,0); if(nowres); item(lost:aleq|alpt|bank,̌,1); item(lost:aleq|alpt|bank,̏,1); item(lost:aleq|alpt|bank,,1); item(lost:aleq|alpt|bank,,1); text(1,(face=uam,swait=-1),w%it[*̌].nmicxƁw%it[*̏].nmicx҂B); endif;
endif;
#endif;


#LmR
<kinoko>
zukan(warppos:*all,|=,knk);
text(1,face=uam,Ĥׂ낤H);
#LmRwExB
#text(1,face=uam,Ĥׂ낤HiPȂj);
#text(1,face=uam,Ĥׂ낤HiPȂ聕eXgpj);

#evflag(dspbtrate,&,0b10001); if(nowres);
#item(check:aleq|alpt|bank,퓬ir,1); if(nowres);
#select2(reset,all); select2(+͂(id=0)); select2(+); select2(/); select2(*퓬ir҂܂H\niTȂǂ͗L܂j(cid=));
#evflag(*selected,==,0); if(nowres); evflag(dspbtrate,&=~,0b10001); text(1,face=uam,E\ɂB); endif;
#evflag(*selected,==,0); if(nowres); item(lost:aleq|alpt|bank,퓬ir,1); text(1,face=uam,퓬ir҂B); endif;
#else;
#sound(warp); evflag(dspbtrate,|=,0b10001); item(get,퓬ir,1);
#text(1,face=uam,퓬AE\悤ɂȂI\nɒǉꂽw퓬irxɂĂnm^neeݒł܂B);
#endif;

evflagsw(pr_dsphitr,==,0); or; evflagsw(dsphitr,==,0); or; evflagsw(dspescr,==,0); if(nowres);
sound(warp); evflagsw(pr_dsphitr,=,1); evflagsw(dsphitr,=,1); evflagsw(dspescr,=,1); text(1,(face=uam,swait=-1),퓬A\悤ɂȂI);
#sound(warp); evflagsw(pr_dsphitr,=,1); evflag(dspbtrate,|=,0b10001); text(1,(face=uam,swait=-1),퓬AE\悤ɂȂI\nwx́w\ݒxɂĕ\̂nm^neeݒł܂B);
#sound(warp); evflagsw(pr_dsphitr,=,1); evflag(dspbtrate,|=,0b1); text(1,(face=uam,swait=-1),\悤ɂȂI);
else;
#text(1,(face=uam,swait=-1),ł͖Ɠ\悤ɂȂBȏ͓ɉ悤B\n%ct3\̂nm^neéw%dtp[*item].nmicx́w%it[*\ݒ].nmicxł܂BĂneeɂĂTȂǂ͂܂B%cd);
#text(1,(face=uam,swait=-1),ȏ͓ɉȂ悤B);
text(1,(face=uam,lwait=0,select=͂\n,islc=1),̕\neeɂ܂H\n%ct3ĂneeɂĂTȂǂ͗L܂B\nݒ̓j[́w%sysm[*config].nmicx́w%sysm[*btlnavi].nmicxłł܂B);
#select2(reset,all); select2(+͂(id=0)); select2(+); select2(/); select2(*̕\neeɂ܂H\n%ct3ĂneeɂĂTȂǂ͗L܂\nݒ́w%dtp[*item].nmicx́w%it[*\ݒ].nmicxłł܂(cid=));
evflag(*selected,==,0); if(nowres); evflagsw(dsphitr,=,0); evflagsw(dspescr,=,0); text(1,(face=uam,swait=-1),\ɂB); endif;
endif;
#text(1,face=uam,͐퓬AGIۂɓG̖Ỏɕ\Bwx́w\ݒxɂĕ\̂nm^nee\B);
#text(1,face=uam,͓GIۂ̓G̖ȌɁÁw%sk[*].nmicx̐̏ɏoė邼I@w%dtp[*item].nmicx́w%it[*\ݒ].nmicxɂĕ\̂nm^neeݒ\I);

#text(1,face=uam,10^鎖ŁA򂪐܂悤B);
#item(check:eq,,10); if(nowres);
#item(check,,full); if(nowres);
#text(1,face=uam,͂ȏ͎ĂȂB);
#else;
#select2(reset,all); select2(+^Ă݂(id=0)); select2(+^Ă݂Ȃ); select2(*(cid=));
#evflag(*selected,==,0); if(nowres); item(lost:eq,,10); item(get,,1); text(0,ɓꂽI); endif;
#endif;
#endif;

#mc(0,dmg,fld, 5,5,0,0,10,10, 200,200,200,200,0,0,0,0,,,10,4,0);
#mc(1,dmg,btl, 50,50,0,0,50,50, 200,200,200,200,0,0,0,0,,,10,4,0);
#mc(5,ans,0);
#mc(8,ans,==,4);
#if(nowres);
#mc(8,ans,=,16); mc(8,enc,=,2); mc(8,btf,desert3); mc(8,enegr,=,(ip~PQ,Kp~PQ,O[e,u][));
#setmapdat(all,0,18,5);
#else;
#mc(8,ans,=,4); mc(8,enc,=,10); mc(8,btf,sea2); mc(8,enegr,=,(iv~PQ,Kv~PQ,Keo));
#mc(8,reset);
#setmapdat(all,0,5,18);
#endif;
#mc(13,pic,(60,66)); mc(13,ani,+=,1);
#mc(13,dmg,fld, 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, ,,10,0);
#mc(13,dmg,btl, 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, ,,10,0);


#LmRʘHɓ
<mush_in>
fc(*actor,moved,x); if(nowres);
fc(*actor,ride,offable,*actor:ride:-1); if(nowres);
#timer();
#fc(*actor,walkto,1,8,*target); return;
fade(out,(type=fade,color=000000,wait=16)); not; fc(*actor,moved,x-); if(nowres); zukan(warppos:*all,|=,knw_w); fc(*actor,move,0,0,center); fc(*actor,dir,=,r); else; zukan(warppos:*all,|=,knw_e); fc(*actor,move,35,0,center); fc(*actor,dir,=,l); endif; changemap(LmRʘH);
fc(*actor,moved,x-); if(nowres);
#ŠʗL
fcslc(c2); while; if(nowres); fc(*select,apr,=,0); fc(*select,ani,=,3); fcslc(*nextlabel); next; endif; wend;
retpos(set,tB[h,20,-21); fc(c1,apr,=,0); fc(c1:1,apr,=,0); fc(c4,apr,=,0);
#fc(c5,apr,=,0);
else; retpos(set,tB[h,18,-21); endif; fade(in,(type=fade,color=000000,wait=16));
endif;
endif;


#鋫ɓ
<hyper_in>
zukan(warppos:*all,|=,stc);
#fcride(check,,,3); label(4);
#item(check:eq,,1); and; item(check:eq,,1); if(nowres);
#evflag(main,<,2,3,);
item(check:eq,̈,1); or; item(check:eq,,1); if(nowres);
evflagsw(ex_hyper,==,0); if(nowres); evflagsw(ex_hyper,=,1); text(1,face=uam,ɂ͍̋CzW܂ĂI\nȂ󂪔II); endif;
sound(warp); zukan(warppos:*all,|=,hyper); fade(out,(type=fade,color=ffffff,wait=16)); fc(*actor,move,0,0,center); changemap(nCp[v[); fade(in,(type=fade,color=ffffff,wait=16)); end;
else; text(1,face=uam,ɂ͍̋CzW܂ĂI); endif;
#label(3); evflag(main,>=,3,4,); text(1,face=uam,܂͏蕨ōsKvL悤B); end;
#label(3); text(1,face=uam,{҂NAĂKvL悤B); end;


#ʐ_a
<shinden>
zukan(warppos:*all,|=,shinden);

#text(1,face=uam,ʂ̐_â悤Bɉ悤B);
#text(1,face=uam,ʂ̐_â悤Bł́w%it[*Rz].nmicxw%it[*①].nmicxw%it[*z[X].nmicxĂƁAw%stat[*mep].nmicx+10܂ōPvIɑ₷ł悤B);
#text(1,face=uam,ʂ̐_â悤Bł́AS̐l`𑵂Ă܂ꍇAI}PIɍődo+10܂ňグ鎖ł悤B\n͂܂B);
#item(check:eq,_},1); and; item(check:eq,L,1); and; item(check:eq,,1); and; item(check:eq,͂ɂ,1); if(nowres);
#item(check:eq,Rz,1); and; item(check:eq,①,1); and; item(check:eq,z[X,1); if(nowres);
#formem(party); member(select,status,mep,org,<,10); nextmem(exis); if(nowres);
#formem(party); member(select,status,mep,org,<,10); if(nowres); member(select,status,mep,org,=,10); endif; nextmem(); sound(warp); text(1,face=uam,S̍ődoʏ+10ɂȂI);
#else;
#text(1,face=uam,ődoɖ߂܂H\niTȂǂ͗L܂j);
#select2(reset,all); select2(+͂(id=0)); select2(+); select2(/); select2(*ődoɖ߂܂H(cid=));
#evflag(*selected,==,0); if(nowres); formem(party); member(select,status,mep,org,=,0); nextmem(); text(1,face=uam,S̍ődoɖ߂B); endif;
#endif;
#endif;
#item(check:eq,_ǎ,1); if(nowres); text(1,face=uam,w_ǎx͂Ƃ͖֌Ŵ悤B); endif;

text(1,face=uam,_â悤Bł̓I}PIɁAl`̎ސɉāw%stat[*mep].nmicxグ鎖ł悤B\n%ct3͂܂B%cd);

evflag(instant1,=,0);
item(check:eq,,1); if(nowres); evflag(instant1,+=,1); endif;
item(check:eq,͂ɂ,1); if(nowres); evflag(instant1,+=,1); endif;
item(check:eq,sl`,1); if(nowres); evflag(instant1,+=,1); endif;
item(check:eq,_},1); if(nowres); evflag(instant1,+=,1); endif;
item(check:eq,L,1); if(nowres); evflag(instant1,+=,1); endif;
item(check:eq,,1); if(nowres); evflag(instant1,+=,1); endif;

evflag(instant1,>=,6); and; not; item(check:aleq|alpt|bank,lȐ,1); if(nowres); sound(warp); item(get,lȐ,1); text(1,(face=uam,swait=-1),w%ct2%it[*lȐ].nmic%cdxɓꂽI); endif;

select2(reset,all);
#select2(reset,pos); while; select2(reset,list);
select2(+%stat[*mep]ʏ+1܂ňグ(id=0,ic=arrow_u,com=l`Pވȏ㏊ŗp,en=*evf(instant1)>=1)); formem(party); member(select,status,mep,org,<,1); nextmem(exis); unif(nowres); select2(setname,,+=,*iρj); select2(setenable,,0); endif;
select2(+%stat[*mep]ʏ+2܂ňグ(id=1,ic=arrow_u,com=l`Qވȏ㏊ŗp,en=*evf(instant1)>=2)); formem(party); member(select,status,mep,org,<,2); nextmem(exis); unif(nowres); select2(setname,,+=,*iρj); select2(setenable,,0); endif;
select2(+%stat[*mep]ʏ+3܂ňグ(id=2,ic=arrow_u,com=l`Rވȏ㏊ŗp,en=*evf(instant1)>=3)); formem(party); member(select,status,mep,org,<,3); nextmem(exis); unif(nowres); select2(setname,,+=,*iρj); select2(setenable,,0); endif;
select2(+%stat[*mep]ʏ+6܂ňグ(id=3,ic=arrow_u,com=l`Sވȏ㏊ŗp,en=*evf(instant1)>=4)); formem(party); member(select,status,mep,org,<,6); nextmem(exis); unif(nowres); select2(setname,,+=,*iρj); select2(setenable,,0); endif;
select2(+%stat[*mep]ʏ+10܂ňグ(id=4,ic=arrow_u,com=l`Tވȏ㏊ŗp,en=*evf(instant1)>=5)); formem(party); member(select,status,mep,org,<,10); nextmem(exis); unif(nowres); select2(setname,,+=,*iρj); select2(setenable,,0); endif;
select2(+%stat[*mep]ʏ+18܂ňグ(id=5,ic=arrow_u,com=l`SUޏŗp,en=*evf(instant1)>=6)); formem(party); member(select,status,mep,org,<,18); nextmem(exis); unif(nowres); select2(setname,,+=,*iρj); select2(setenable,,0); endif;
formem(party); member(select,status,mep,org,>,0); nextmem(exis); select2(+%stat[*mep]ɖ߂(id=10,ic=arrow_d,com=Ė߂ĂTȂǂ͗L܂B,en=*nowres));
item(check:aleq|alpt|bank,lȐ,1); if(nowres); select2(+%it[*lȐ]҂(id=11,com=Ċ҂ĂTȂǂ͗L܂B)); endif;
#select2(+Ȃ(ic=close));
select2(*mdoグiSjn(cid=,swait=-1));

evflag(*selected,==,0); if(nowres); formem(party); member(select,status,mep,org,<,1); if(nowres); member(select,status,mep,org,=,1); endif; nextmem(); sound(warp); text(1,(face=uam,swait=-1),Św%stat[*mep].nmicxʏ+1ɂȂI); end; endif;
evflag(*selected,==,1); if(nowres); formem(party); member(select,status,mep,org,<,2); if(nowres); member(select,status,mep,org,=,2); endif; nextmem(); sound(warp); text(1,(face=uam,swait=-1),Św%stat[*mep].nmicxʏ+2ɂȂI); end; endif;
evflag(*selected,==,2); if(nowres); formem(party); member(select,status,mep,org,<,3); if(nowres); member(select,status,mep,org,=,3); endif; nextmem(); sound(warp); text(1,(face=uam,swait=-1),Św%stat[*mep].nmicxʏ+3ɂȂI); end; endif;
evflag(*selected,==,3); if(nowres); formem(party); member(select,status,mep,org,<,6); if(nowres); member(select,status,mep,org,=,6); endif; nextmem(); sound(warp); text(1,(face=uam,swait=-1),Św%stat[*mep].nmicxʏ+6ɂȂI); end; endif;
evflag(*selected,==,4); if(nowres); formem(party); member(select,status,mep,org,<,10); if(nowres); member(select,status,mep,org,=,10); endif; nextmem(); sound(warp); text(1,(face=uam,swait=-1),Św%stat[*mep].nmicxʏ+10ɂȂI); end; endif;
evflag(*selected,==,5); if(nowres); formem(party); member(select,status,mep,org,<,18); if(nowres); member(select,status,mep,org,=,18); endif; nextmem(); sound(warp); text(1,(face=uam,swait=-1),Św%stat[*mep].nmicxʏ+18ɂȂI); end; endif;
evflag(*selected,==,10); if(nowres); formem(party); member(select,status,mep,org,=,0); nextmem(); text(1,(face=uam,swait=-1),Św%stat[*mep].nmicxɖ߂B); end; endif;
evflag(*selected,==,11); if(nowres); item(lost:aleq|alpt|bank,lȐ,1); text(1,(face=uam,swait=-1),w%it[*lȐ].nmicx҂B); end; endif;

#wend;


#nG
<chijoue>
zukan(warppos:*all,|=,chijoue);
text(1,face=uam,nĜ悤B);
#ȉj
#ɈӖ͖悤B

item(check:aleq|alpt|bank,ip[,1); or; item(check:aleq|alpt|bank,G,1); unif(nowres);
# or; item(check:aleq|alpt|bank,jukebox,1);
sound(warp); item(get,ip[,1); item(get,G,1); text(1,(face=uam,swait=-1),w%ct2%it[*ip[].nmic%cdxw%ct2%it[*G].nmic%cdxɓꂽI);
#item(get,jukebox,1);
text(1,(face=uam,swait=-1),w%ct2%it[*ip[].nmic%cdx͏ôG̏̉{Aw%ct2%it[*G].nmic%cdx͂̑X̏̉{ł邼I@ȂAɖڂʂKv͖I);
#w%ct2%it[*jukebox].nmic%cdx͕̂鉹yTEh𕷂
else;
text(1,(face=uam,lwait=0,select=҂\n҂Ȃ,islc=1),w%it[*ip[].nmicxw%it[*G].nmicx҂܂H\n%ct3Ċ҂ĂTȂǂ͗L܂B%cd);
#w%it[*jukebox].nmicx
evflag(*selected,==,0); if(nowres); item(lost:aleq|alpt|bank,ip[,1); item(lost:aleq|alpt|bank,G,1); text(1,(face=uam,swait=-1),w%it[*ip[].nmicxw%it[*G].nmicx҂B); endif;
#item(lost:aleq|alpt|bank,jukebox,1);
endif;

#evflagsw(pr_chijoue,==,0); if(nowres);
#sound(warp); evflagsw(pr_chijoue,=,1); evflag(dspbtrate,|=,0b10000); text(1,face=uam,퓬A\悤ɂȂI\nwx́w\ݒxɂĕ\̂nm^neeݒł܂B);
#sound(warp); evflagsw(pr_chijoue,=,1); evflag(dspbtrate,|=,0b10000); text(1,face=uam,\悤ɂȂI);
#else;
#endif;
#text(1,face=uam,͐퓬AwxȂǂ̐̉̏ɕ\Bwx́w\ݒxɂĕ\̂nm^nee\B);


#ΎR
<kazan>
zukan(warppos:*all,|=,kazan);
sound(attack3);
text(1,face=uam,ΎR̂悤B);

evflagsw(pr_dspcrtr,==,0); or; evflagsw(dspcrtr,==,0); or; evflagsw(dspblkr,==,0); or; evflagsw(dspmbdmg,==,0); if(nowres);
sound(warp); evflagsw(pr_dspcrtr,=,1); evflagsw(dspcrtr,=,1); evflagsw(dspblkr,=,1); evflagsw(dspmbdmg,=,1); text(1,(face=uam,swait=-1),퓬A\_[W\悤ɂȂI);
else;
text(1,(face=uam,lwait=0,select=͂\n,islc=1),\_[W̕\neeɂ܂H\n%ct3ĂneeɂĂTȂǂ͗L܂B\nݒ̓j[́w%sysm[*config].nmicx́w%sysm[*btlnavi].nmicxłł܂B);
#select2(reset,all); select2(+͂(id=0)); select2(+); select2(/); select2(*\_[W̕\neeɂ܂H\n%ct3ĂneeɂĂTȂǂ͗L܂\nݒ́w%dtp[*item].nmicx́w%it[*\ݒ].nmicxłł܂(cid=));
evflag(*selected,==,0); if(nowres); 
evflagsw(dspcrtr,=,0); evflagsw(dspblkr,=,0); evflagsw(dspmbdmg,=,0); text(1,(face=uam,swait=-1),퓬A\_[W\ɂB); endif;
endif;


#eXgɓij
<test1_in1>
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,1,6,center); fc(*actor,dir,=,l); changemap(eXgP); fade(in,(type=fade,color=000000,wait=16));


#eXgɓiCj
<test1_in2>
#fc(*actor,ride,offable,*actor:ride:-1); 
#evflagsw(pr_honpen,==,1);
fc(*actor,ride,check,*null); or; fc(*actor,ride,check,ship_mv); if(nowres);
#fcride(check,ship,,3); 
#fcride(check,,3,); fcride(offable,,3);
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,-12,14,center); fc(*actor,dir,=,u); changemap(eXgP); retpos(set,tB[h,27,4); fade(in,(type=fade,color=000000,wait=16));
#label(3);
endif;


#^G^
<metaele>
fade(out,(type=btdefo,color=btdefo,dep=btdefo,rot=btdefo,wait=btdefo)); battle((enegr=^,chdmg=+ԕ\,stm=0,btm=ae|ns)); fade(in2,);
evflag(*selected,==,1); if(nowres); fc(*target,apr,=,0); endif;
evflag(*selected,==,3); if(nowres); text(1,(face=uam,swait=-1),|ĂɈӖ̖̂悤BuĐ֐iB); endif;


#zEG^
<hollele>
fade(out,(type=btdefo,color=btdefo,dep=btdefo,rot=btdefo,wait=btdefo)); battle((enegr=zE,chdmg=+ԕ\,stm=0,btm=ae|ns)); fade(in2,);
evflag(*selected,==,1); if(nowres); fc(*target,apr,=,0); endif;
evflag(*selected,==,3); if(nowres); text(1,(face=uam,swait=-1),|ĂɈӖ̖̂悤BuĐ֐iB); endif;


#ÕKCh
<kofunguide>
text(1,(face=uam,swait=-1),vC킯łȂ΁AƂ̋߂ɂ%o[*kofun]Õ̂悤Ȃ̂ɂ؂񗧂Ă݂悤I); fc(*target,apr,=,0);


#ֈړ
<left>
text(1,face=uam,֖߂悤ɂȂĂ悤B\n%ct3lݑ΍łB%cd);
select2(reset,all); select2(+͂(id=0)); select2(+); select2(/); select2(*߂܂H(cid=));
evflag(*selected,==,0); if(nowres); sound(drop); fc(*actor,walk,0,8,-3,0,l); return; endif;